home *** CD-ROM | disk | FTP | other *** search
/ Apple Reference & Presen… 1994 February Supplement / ARPL-Feb-94-Supplement-PowerPC.iso / 3rd Party PowerPC Demo Apps / Aldus FreeHand / Aldus FreeHand 4.0 TV / Aldus FreeHand 4.0 TV.rsrc / Post_1167 < prev    next >
Encoding:
Text File  |  1994-01-25  |  293 b   |  11 lines

  1. ropedict begin
  2. /arrow 
  3. { cnt 0 eq 
  4. { q blw w stroke Q [0 0 0 0] vc } if incrcnt
  5.  blocksetup -.4 0 m .15 .4 L 0 0 L 
  6.  .15 -.4 L blockend .2 0 m .2 .2 .25 .4 .35 .4 C
  7.  .45 .4 .5 .2 .5 0 C .5 -.2 .45 -.4 .35 -.4 C
  8.  .25 -.4 .2 -.2 .2 0 C blockend .1 0 m .2 .1 L 
  9.  .2 -.1 L  blockfinish} def
  10. end